home *** CD-ROM | disk | FTP | other *** search
/ Eagles Nest BBS 4 / Eagles_Nest_Mac_Collection_Disc_4.TOAST / Desktop Publishing / DTPAdv10 / DTP Database / card_4865.txt < prev    next >
Text File  |  1988-09-02  |  10KB  |  488 lines

  1. -- card: 4865 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2779
  5. -- name: MasterPhoto
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put field "one" of card masterphoto into field "one"
  9.   put field "two" of card masterphoto into field "two"
  10.   put field "three" of card masterphoto into field "three"
  11.   put field "four" of card masterphoto into field "four"
  12. end opencard
  13.  
  14. on closefield
  15.   set cursor to watch
  16.   lock screen
  17.   push card
  18.   go card main
  19.   click at the loc of card button "photographer"
  20.   pop card
  21.   unlock screen
  22. end closefield
  23.  
  24.  
  25. -- part 7 (button)
  26. -- low flags: 00
  27. -- high flags: 2005
  28. -- rect: left=16 top=180 right=196 bottom=34
  29. -- title width / last selected line: 0
  30. -- icon id / first selected line: 0 / 0
  31. -- text alignment: 1
  32. -- font id: 0
  33. -- text size: 12
  34. -- style flags: 0
  35. -- line height: 16
  36. -- part name: a
  37.  
  38.  
  39. -- part 8 (button)
  40. -- low flags: 00
  41. -- high flags: 2005
  42. -- rect: left=16 top=195 right=211 bottom=34
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 0
  47. -- text size: 12
  48. -- style flags: 0
  49. -- line height: 16
  50. -- part name: b
  51.  
  52.  
  53. -- part 9 (button)
  54. -- low flags: 00
  55. -- high flags: 2005
  56. -- rect: left=16 top=210 right=226 bottom=34
  57. -- title width / last selected line: 0
  58. -- icon id / first selected line: 0 / 0
  59. -- text alignment: 1
  60. -- font id: 0
  61. -- text size: 12
  62. -- style flags: 0
  63. -- line height: 16
  64. -- part name: c
  65.  
  66.  
  67. -- part 10 (button)
  68. -- low flags: 00
  69. -- high flags: 2005
  70. -- rect: left=16 top=225 right=241 bottom=34
  71. -- title width / last selected line: 0
  72. -- icon id / first selected line: 0 / 0
  73. -- text alignment: 1
  74. -- font id: 0
  75. -- text size: 12
  76. -- style flags: 0
  77. -- line height: 16
  78. -- part name: d
  79.  
  80.  
  81. -- part 11 (button)
  82. -- low flags: 00
  83. -- high flags: 2005
  84. -- rect: left=16 top=240 right=256 bottom=34
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 0 / 0
  87. -- text alignment: 1
  88. -- font id: 0
  89. -- text size: 12
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: e
  93.  
  94.  
  95. -- part 12 (button)
  96. -- low flags: 00
  97. -- high flags: 2005
  98. -- rect: left=16 top=255 right=271 bottom=34
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 1
  102. -- font id: 0
  103. -- text size: 12
  104. -- style flags: 0
  105. -- line height: 16
  106. -- part name: f
  107.  
  108.  
  109. -- part 23 (button)
  110. -- low flags: 00
  111. -- high flags: 2005
  112. -- rect: left=136 top=180 right=196 bottom=154
  113. -- title width / last selected line: 0
  114. -- icon id / first selected line: 0 / 0
  115. -- text alignment: 1
  116. -- font id: 0
  117. -- text size: 12
  118. -- style flags: 0
  119. -- line height: 16
  120. -- part name: g
  121.  
  122.  
  123. -- part 24 (button)
  124. -- low flags: 00
  125. -- high flags: 2005
  126. -- rect: left=374 top=195 right=211 bottom=392
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 0 / 0
  129. -- text alignment: 1
  130. -- font id: 0
  131. -- text size: 12
  132. -- style flags: 0
  133. -- line height: 16
  134. -- part name: t
  135.  
  136.  
  137. -- part 25 (button)
  138. -- low flags: 00
  139. -- high flags: 2005
  140. -- rect: left=374 top=210 right=226 bottom=392
  141. -- title width / last selected line: 0
  142. -- icon id / first selected line: 0 / 0
  143. -- text alignment: 1
  144. -- font id: 0
  145. -- text size: 12
  146. -- style flags: 0
  147. -- line height: 16
  148. -- part name: u
  149.  
  150.  
  151. -- part 26 (button)
  152. -- low flags: 00
  153. -- high flags: 2005
  154. -- rect: left=374 top=225 right=241 bottom=392
  155. -- title width / last selected line: 0
  156. -- icon id / first selected line: 0 / 0
  157. -- text alignment: 1
  158. -- font id: 0
  159. -- text size: 12
  160. -- style flags: 0
  161. -- line height: 16
  162. -- part name: v
  163.  
  164.  
  165. -- part 27 (button)
  166. -- low flags: 00
  167. -- high flags: 2005
  168. -- rect: left=374 top=240 right=256 bottom=392
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: w
  177.  
  178.  
  179. -- part 28 (button)
  180. -- low flags: 00
  181. -- high flags: 2005
  182. -- rect: left=374 top=255 right=271 bottom=392
  183. -- title width / last selected line: 0
  184. -- icon id / first selected line: 0 / 0
  185. -- text alignment: 1
  186. -- font id: 0
  187. -- text size: 12
  188. -- style flags: 0
  189. -- line height: 16
  190. -- part name: x
  191.  
  192.  
  193. -- part 29 (button)
  194. -- low flags: 00
  195. -- high flags: 2005
  196. -- rect: left=136 top=195 right=211 bottom=154
  197. -- title width / last selected line: 0
  198. -- icon id / first selected line: 0 / 0
  199. -- text alignment: 1
  200. -- font id: 0
  201. -- text size: 12
  202. -- style flags: 0
  203. -- line height: 16
  204. -- part name: h
  205.  
  206.  
  207. -- part 30 (button)
  208. -- low flags: 00
  209. -- high flags: 2005
  210. -- rect: left=136 top=210 right=226 bottom=154
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 0 / 0
  213. -- text alignment: 1
  214. -- font id: 0
  215. -- text size: 12
  216. -- style flags: 0
  217. -- line height: 16
  218. -- part name: i
  219.  
  220.  
  221. -- part 31 (button)
  222. -- low flags: 00
  223. -- high flags: 2005
  224. -- rect: left=136 top=225 right=241 bottom=154
  225. -- title width / last selected line: 0
  226. -- icon id / first selected line: 0 / 0
  227. -- text alignment: 1
  228. -- font id: 0
  229. -- text size: 12
  230. -- style flags: 0
  231. -- line height: 16
  232. -- part name: j
  233.  
  234.  
  235. -- part 32 (button)
  236. -- low flags: 00
  237. -- high flags: 2005
  238. -- rect: left=136 top=240 right=256 bottom=154
  239. -- title width / last selected line: 0
  240. -- icon id / first selected line: 0 / 0
  241. -- text alignment: 1
  242. -- font id: 0
  243. -- text size: 12
  244. -- style flags: 0
  245. -- line height: 16
  246. -- part name: k
  247.  
  248.  
  249. -- part 33 (button)
  250. -- low flags: 00
  251. -- high flags: 2005
  252. -- rect: left=136 top=255 right=271 bottom=154
  253. -- title width / last selected line: 0
  254. -- icon id / first selected line: 0 / 0
  255. -- text alignment: 1
  256. -- font id: 0
  257. -- text size: 12
  258. -- style flags: 0
  259. -- line height: 16
  260. -- part name: l
  261.  
  262.  
  263. -- part 34 (button)
  264. -- low flags: 00
  265. -- high flags: 2005
  266. -- rect: left=252 top=180 right=196 bottom=270
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 0 / 0
  269. -- text alignment: 1
  270. -- font id: 0
  271. -- text size: 12
  272. -- style flags: 0
  273. -- line height: 16
  274. -- part name: m
  275.  
  276.  
  277. -- part 35 (button)
  278. -- low flags: 00
  279. -- high flags: 2005
  280. -- rect: left=252 top=195 right=211 bottom=270
  281. -- title width / last selected line: 0
  282. -- icon id / first selected line: 0 / 0
  283. -- text alignment: 1
  284. -- font id: 0
  285. -- text size: 12
  286. -- style flags: 0
  287. -- line height: 16
  288. -- part name: n
  289.  
  290.  
  291. -- part 36 (button)
  292. -- low flags: 00
  293. -- high flags: 2005
  294. -- rect: left=252 top=210 right=226 bottom=270
  295. -- title width / last selected line: 0
  296. -- icon id / first selected line: 0 / 0
  297. -- text alignment: 1
  298. -- font id: 0
  299. -- text size: 12
  300. -- style flags: 0
  301. -- line height: 16
  302. -- part name: o
  303.  
  304.  
  305. -- part 37 (button)
  306. -- low flags: 00
  307. -- high flags: 2005
  308. -- rect: left=252 top=225 right=241 bottom=270
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 0 / 0
  311. -- text alignment: 1
  312. -- font id: 0
  313. -- text size: 12
  314. -- style flags: 0
  315. -- line height: 16
  316. -- part name: p
  317.  
  318.  
  319. -- part 38 (button)
  320. -- low flags: 00
  321. -- high flags: 2005
  322. -- rect: left=252 top=240 right=256 bottom=270
  323. -- title width / last selected line: 0
  324. -- icon id / first selected line: 0 / 0
  325. -- text alignment: 1
  326. -- font id: 0
  327. -- text size: 12
  328. -- style flags: 0
  329. -- line height: 16
  330. -- part name: q
  331.  
  332.  
  333. -- part 39 (button)
  334. -- low flags: 00
  335. -- high flags: 2005
  336. -- rect: left=252 top=255 right=271 bottom=270
  337. -- title width / last selected line: 0
  338. -- icon id / first selected line: 0 / 0
  339. -- text alignment: 1
  340. -- font id: 0
  341. -- text size: 12
  342. -- style flags: 0
  343. -- line height: 16
  344. -- part name: r
  345.  
  346.  
  347. -- part 40 (button)
  348. -- low flags: 00
  349. -- high flags: 2005
  350. -- rect: left=374 top=180 right=196 bottom=392
  351. -- title width / last selected line: 0
  352. -- icon id / first selected line: 0 / 0
  353. -- text alignment: 1
  354. -- font id: 0
  355. -- text size: 12
  356. -- style flags: 0
  357. -- line height: 16
  358. -- part name: s
  359.  
  360.  
  361. -- part 47 (button)
  362. -- low flags: 00
  363. -- high flags: A003
  364. -- rect: left=367 top=135 right=151 bottom=506
  365. -- title width / last selected line: 0
  366. -- icon id / first selected line: 0 / 0
  367. -- text alignment: 1
  368. -- font id: 3
  369. -- text size: 10
  370. -- style flags: 0
  371. -- line height: 13
  372. -- part name: Hire/Bid
  373. ----- HyperTalk script -----
  374. on mouseUp
  375.   global copyform
  376.   if copyform is "DTP Master Forms" then
  377.     whatform
  378.     exit mouseup
  379.   end if
  380.   set cursor to 4
  381.   put the short name of this card into cname
  382.   put field "name" into contactname
  383.   answer "Hire or bid this person?" with "Hire" or "Bid" or "Cancel"
  384.   if it is "cancel" then
  385.     exit mouseup
  386.   else if it is "Bid" then
  387.     push card
  388.     go card "photographer bids" of stack copyform
  389.     put 1 into x
  390.     repeat for 3
  391.       if card field x is empty then
  392.         put contactname into card field x
  393.         exit mouseup
  394.       else
  395.         put 1+x into x
  396.       end if
  397.     end repeat
  398.     answer "Replace contents of last field." with "OK" or "Cancel"
  399.     if it is "OK" then
  400.       put contactname into card field 3
  401.     end if
  402.   else if it is "hire" then
  403.     push card
  404.     go card "project management form" of stack copyform
  405.     if card field "photogname" is empty then
  406.       put contactname into card field photogname
  407.     else
  408.       answer "The space is full.  OK to replace?" with "Cancel" or "OK"
  409.       if it is "ok" then
  410.         put contactname into card field photogname
  411.       end if
  412.     end if
  413.   end if
  414.  
  415.   --set lockscreen to false
  416.   set cursor to 1
  417. end mouseUp
  418.  
  419.  
  420.  
  421. -- part 48 (button)
  422. -- low flags: 00
  423. -- high flags: 0000
  424. -- rect: left=411 top=0 right=19 bottom=433
  425. -- title width / last selected line: 0
  426. -- icon id / first selected line: 0 / 0
  427. -- text alignment: 1
  428. -- font id: 0
  429. -- text size: 12
  430. -- style flags: 0
  431. -- line height: 16
  432. -- part name: 
  433. ----- HyperTalk script -----
  434. on mouseUp
  435.   global soundstatus, doipop
  436.   put "true" into doipop
  437.   if soundstatus is "on" then
  438.     Play harpsichord qr e6t d c
  439.   end if
  440.  
  441.   Visual effect wipe down
  442.   go card main
  443. end mouseUp
  444.  
  445.  
  446.  
  447. -- part contents for background part 31
  448. ----- text -----
  449. Company
  450. Contact
  451. Address
  452. City, State, Zip
  453. Phone Number
  454.  
  455. -- part contents for background part 1
  456. ----- text -----
  457. People
  458. Industrial
  459. Architectural
  460. Still Life/Food
  461.  
  462. -- part contents for background part 4
  463. ----- text -----
  464. Studio
  465. Location
  466.  
  467. -- part contents for background part 5
  468. ----- text -----
  469. 35mm
  470. 2 1/4
  471. 4 x 5
  472. 8 x 10
  473.  
  474.  
  475. -- part contents for background part 6
  476. ----- text -----
  477. Low Cost
  478. Medium Cost
  479. High Cost
  480.  
  481.  
  482. -- part contents for background part 40
  483. ----- text -----
  484. PHOTOGRAPHER 
  485.  
  486. -- part contents for background part 47
  487. ----- text -----
  488. Master Form